unit DMu;

interface

uses
  Windows,SysUtils, Classes, DB, DBClient, MConnect, SConnect,Dialogs,forms,Variants,
   DBGridEh,DBGrids,MidasLib;

type
  TDM = class(TDataModule)
    SocketConnect: TSocketConnection;
    cdsSetup: TClientDataSet;
    cdsMaster: TClientDataSet;
    cdsDetail: TClientDataSet;
    cdsGetTime: TClientDataSet;
    cdsTmpUser: TClientDataSet;
    cdsTmpDll: TClientDataSet;
    cdsThird: TClientDataSet;
    cdsMsgView: TClientDataSet;
    cdsCurUser0: TClientDataSet;
    SocketConnectB: TSocketConnection;
  private
    { Private declarations }
  public
    { Public declarations }
  end;


var
  DM: TDM;
  User:string;
implementation

{$R *.dfm}
end.
